Automatic generation produced by ISE Eiffel
indexing
description: "Objects that ..."
author: ""
date: "$Date$"
revision: "$Revision$"
class interface
DIRECTORY_CLASS
create
make
feature -- Access
size: REAL
-- in mb
caption: STRING
path: STRING
file_system: KL_WINDOWS_FILE_SYSTEM
feature -- initialization
make (a_path: STRING)
require
a_path_exists: a_path /= Void and then (a_path.count > 0)
ensure
path_set: path = a_path
caption_set: caption /= Void and then caption.count > 0
feature -- Output
out: STRING
invariant
caption_exists: caption /= Void
path_exists: path /= Void and then path.count > 0
end -- class DIRECTORY_CLASS
-- Generated by ISE Eiffel --
For more details: www.eiffel.com